home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / comm / tcp / SMSEngineerMUI.lha / InstallSMSEngineerMUI / InstallOS35_SMSEngineer < prev    next >
Text File  |  2000-11-16  |  2KB  |  73 lines

  1. ;SMSE_Install Script v1.0 OS3.5 written by dEFtONE 2ooo
  2.  
  3. (effect "lower_right" "radial" $FFFFF0 $662222)
  4.  
  5. (set #language (getenv "Language"))
  6.  
  7. (set #SMSEngineerMUIpic "SMSEngineerMUI")
  8.  
  9. (showmedia 'SMSEngineerMUIpic' (tackon "Installpics/" #SMSEngineerMUIpic) 'upper_left' 'none' 1)
  10.   
  11. (set @user-level 2)
  12.  
  13. (working "System check...")
  14. (set #wel "\n\n-------------------------------------------------\n\nBLiTZENGiNEERS\n\n-------------------------------------------------\n\npresents to you SMSEngineerMUI - Simple SMS Send!")
  15. (set #ds 450000)
  16. (complete 0)
  17. (if (< @installer-version 43) (abort "The SMSEngineerMUI install script needs Installer V43+!"))
  18. (complete 1)
  19. (set #ex (getversion "exec.library" (resident)))
  20. (complete 3)
  21. (if (< (shiftright #ex 16) 37) (abort "SMSEngineerMUI needs AmigaOS 2.04 (V37) or higher!"))
  22. (complete 6)
  23. (message #wel) (welcome)
  24. (complete 16)
  25. (set #dst (askdir (prompt "Select the destination directory.\nA new drawer called 'SMSEngineerMUI' will be created.")
  26.                   (help "All files belongs to SMSEngineerMUI will be copied to this directory.\nA new drawer called 'SMSEngineerMUI' will be automatically created.")
  27.                   (default "WORK:")))
  28.  
  29. (complete 17)
  30. (if (< (getdiskspace #dst) #ds) (abort ("There is not enough free disk space for SMSEngineerMUI.\nMin. %ld KB are required." (/ #ds 1024))))
  31. (complete 18)
  32. (set #dst (tackon #dst "SMSEngineerMUI"))
  33. (complete 19)
  34. (message ("\n\n\nInstalling SMSEngineerMUI to '%s'?" #dst))
  35. (complete 20)
  36. (set #dstfnt (tackon #dst "Fonts:"))
  37. (complete 24)
  38. (set #cpuexe (database "cpu"))
  39. (set #cpuexe (- #cpuexe 68000))
  40. (set #cpuexe (/ #cpuexe 10))
  41.  
  42. (complete 26)
  43.  
  44. (complete 40)
  45. (complete 43)
  46. (complete 47)
  47. (working "Installing SMSEngineerMUI...")
  48. (copyfiles (prompt "Installing main files...")
  49.            (help "n/a")
  50.            (source "main/bin")
  51.            (dest #dst)
  52.            (nogauge)
  53.            (all))
  54. (complete 54)
  55. (working "Installing SMSEngineerMUI...")
  56. (copyfiles (prompt "Installing font files...")
  57.            (help "n/a")
  58.            (source "main/fonts")
  59.            (dest #dstfnt)
  60.            (nogauge)
  61.            (all))
  62. (complete 55)
  63.  
  64. (complete 65)
  65.  
  66. (complete 75)
  67.  
  68. (complete 100)
  69.  
  70. (closemedia SMSEngineerMUIpic)
  71.  
  72. (exit "\nSMSEngineerMUI is now installed.\n\nFor bugreports/support/comments etc. please refer to our Homepage..." (quiet))
  73.